home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 April / CMCD0404.ISO / Software / Shareware / Programare / golden / goldensetup57420.exe / {app} / Golden32.exe / 0 / RCDATA / TOPTIONSDLG / TOPTIONSDLG.txt
Encoding:
Text File  |  2004-03-08  |  39.4 KB  |  1,428 lines

  1. object OptionsDlg: TOptionsDlg
  2.   Left = 424
  3.   Top = 186
  4.   HelpContext = 3
  5.   BorderStyle = bsDialog
  6.   Caption = 'Options'
  7.   ClientHeight = 399
  8.   ClientWidth = 428
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -10
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Pitch = fpVariable
  15.   Font.Style = []
  16.   OldCreateOrder = True
  17.   Position = poMainFormCenter
  18.   ShowHint = True
  19.   OnCreate = FormCreate
  20.   PixelsPerInch = 96
  21.   TextHeight = 13
  22.   object Panel1: TPanel
  23.     Left = 0
  24.     Top = 364
  25.     Width = 428
  26.     Height = 35
  27.     Align = alBottom
  28.     BevelOuter = bvNone
  29.     TabOrder = 1
  30.     object OKButton: TRzButton
  31.       Left = 6
  32.       Top = 5
  33.       Default = True
  34.       ModalResult = 1
  35.       Caption = '&Ok'
  36.       HotTrack = True
  37.       TabOrder = 0
  38.     end
  39.     object OKDefaultsButton: TRzButton
  40.       Left = 277
  41.       Top = 5
  42.       Width = 135
  43.       ModalResult = 1
  44.       Caption = 'Ok && &Save as Defaults'
  45.       HotTrack = True
  46.       TabOrder = 2
  47.       OnClick = OKDefaultsButtonClick
  48.     end
  49.     object CancelButton: TRzButton
  50.       Left = 89
  51.       Top = 5
  52.       Cancel = True
  53.       ModalResult = 2
  54.       Caption = '&Cancel'
  55.       HotTrack = True
  56.       TabOrder = 1
  57.     end
  58.   end
  59.   object Panel2: TPanel
  60.     Left = 0
  61.     Top = 0
  62.     Width = 428
  63.     Height = 364
  64.     Align = alClient
  65.     BevelOuter = bvNone
  66.     BorderWidth = 4
  67.     TabOrder = 0
  68.     object PageControl1: TPageControl
  69.       Left = 4
  70.       Top = 4
  71.       Width = 420
  72.       Height = 356
  73.       ActivePage = General
  74.       Align = alClient
  75.       MultiLine = True
  76.       TabOrder = 0
  77.       object General: TTabSheet
  78.         Caption = 'General'
  79.         object Label23: TLabel
  80.           Left = 201
  81.           Top = 14
  82.           Width = 137
  83.           Height = 15
  84.           AutoSize = False
  85.           Caption = 'DBMS Output Buffer Size:'
  86.         end
  87.         object Label1: TLabel
  88.           Left = 14
  89.           Top = 14
  90.           Width = 108
  91.           Height = 15
  92.           AutoSize = False
  93.           Caption = 'Default Date Format:'
  94.         end
  95.         object Label8: TLabel
  96.           Left = 16
  97.           Top = 60
  98.           Width = 102
  99.           Height = 13
  100.           Caption = 'Limit Select results to '
  101.         end
  102.         object Label24: TLabel
  103.           Left = 16
  104.           Top = 86
  105.           Width = 94
  106.           Height = 13
  107.           Caption = 'Limit BLOB fields to '
  108.         end
  109.         object Label9: TLabel
  110.           Left = 191
  111.           Top = 60
  112.           Width = 134
  113.           Height = 13
  114.           Caption = 'records (-1 means unlimited.)'
  115.         end
  116.         object Label27: TLabel
  117.           Left = 191
  118.           Top = 86
  119.           Width = 121
  120.           Height = 13
  121.           Caption = 'bytes (-1 means unlimited)'
  122.         end
  123.         object Autocommit: TCheckBox
  124.           Tag = 2
  125.           Left = 15
  126.           Top = 154
  127.           Width = 120
  128.           Height = 17
  129.           Hint = 'Commits changes to the database '
  130.           Caption = 'Autocommit:'
  131.           TabOrder = 7
  132.         end
  133.         object DefaultDateFormat: TEdit
  134.           Tag = 1
  135.           Left = 14
  136.           Top = 29
  137.           Width = 168
  138.           Height = 19
  139.           Hint = 'This is the default date format.'
  140.           AutoSize = False
  141.           TabOrder = 0
  142.           Text = 'MM/DD/YYYY HH24:MI:SS'
  143.         end
  144.         object PromptForSaves: TCheckBox
  145.           Tag = 2
  146.           Left = 15
  147.           Top = 113
  148.           Width = 141
  149.           Height = 18
  150.           Hint = 'Indicates if you want to be warned about losing query text.'
  151.           Caption = 'Prompt for File Saves:'
  152.           Checked = True
  153.           State = cbChecked
  154.           TabOrder = 4
  155.           OnClick = PromptForSavesClick
  156.         end
  157.         object ShowPlanAsText: TCheckBox
  158.           Tag = 2
  159.           Left = 15
  160.           Top = 133
  161.           Width = 171
  162.           Height = 17
  163.           Hint = 
  164.             'If unchecked the explain plan results will show in the spreadshe' +
  165.             'et'
  166.           Caption = 'Show explain plan as text'
  167.           TabOrder = 5
  168.         end
  169.         object QuerySelectLimit: TEdit
  170.           Tag = 1
  171.           Left = 121
  172.           Top = 57
  173.           Width = 58
  174.           Height = 19
  175.           Hint = 'Use this to limit result sets.'
  176.           AutoSize = False
  177.           TabOrder = 2
  178.           Text = '-1'
  179.         end
  180.         object HideBeforeAfterSQL: TCheckBox
  181.           Tag = 2
  182.           Left = 15
  183.           Top = 174
  184.           Width = 159
  185.           Height = 17
  186.           Hint = 'Hides before/after sql examples on the argument prompt window.'
  187.           Caption = 'Hide before/after sql text.'
  188.           TabOrder = 8
  189.         end
  190.         object SaveWorkspaceLinks: TCheckBox
  191.           Tag = 2
  192.           Left = 15
  193.           Top = 195
  194.           Width = 170
  195.           Height = 17
  196.           Hint = 
  197.             'If checked workspaces will be saved with pointers to files inste' +
  198.             'ad of script text.'
  199.           Caption = 'Save workspace files as links'
  200.           TabOrder = 9
  201.         end
  202.         object WorkspaceSaveFinal: TCheckBox
  203.           Tag = 2
  204.           Left = 15
  205.           Top = 215
  206.           Width = 218
  207.           Height = 17
  208.           Hint = 'If checked workspace saves will mark tabs as saved.'
  209.           Caption = 'Workspace save marks tabs as saved'
  210.           TabOrder = 10
  211.         end
  212.         object ScanForVarsDefault: TCheckBox
  213.           Tag = 2
  214.           Left = 15
  215.           Top = 257
  216.           Width = 188
  217.           Height = 17
  218.           Hint = 'Uncheck this to turn off scan for && variables.'
  219.           Caption = 'Scan for prompt vars (&&, &&&&)'
  220.           Checked = True
  221.           State = cbChecked
  222.           TabOrder = 12
  223.         end
  224.         object dbmsoutputbuffer: TEdit
  225.           Tag = 1
  226.           Left = 201
  227.           Top = 29
  228.           Width = 70
  229.           Height = 19
  230.           Hint = 'The buffer sized used for dbms_output.'
  231.           AutoSize = False
  232.           TabOrder = 1
  233.           Text = '30000'
  234.         end
  235.         object UseSimplePlanOutput: TCheckBox
  236.           Tag = 2
  237.           Left = 184
  238.           Top = 132
  239.           Width = 171
  240.           Height = 17
  241.           Hint = 
  242.             'If unchecked the explain plan results will show in the spreadshe' +
  243.             'et'
  244.           Caption = 'Use simple plan output'
  245.           TabOrder = 6
  246.         end
  247.         object BLOBByteLimit: TEdit
  248.           Tag = 1
  249.           Left = 121
  250.           Top = 83
  251.           Width = 58
  252.           Height = 19
  253.           Hint = 
  254.             'Use this to limit the size of BLOBs retrieved from the database.' +
  255.             '  -1 means retrieve entire BLOB, 0 means don'#39't retrieve any BLOB' +
  256.             ' data.  BLOBs show as HEX data.'
  257.           AutoSize = False
  258.           TabOrder = 3
  259.           Text = '0'
  260.         end
  261.         object RestoreButton: TRzButton
  262.           Left = 241
  263.           Top = 259
  264.           Width = 143
  265.           Caption = 'Restore Factory Defaults'
  266.           HotTrack = True
  267.           TabOrder = 13
  268.           OnClick = RestoreDefaultsButtonClick
  269.         end
  270.         object NoWorkspaceBackups: TCheckBox
  271.           Tag = 2
  272.           Left = 15
  273.           Top = 236
  274.           Width = 188
  275.           Height = 17
  276.           Hint = 
  277.             'If this is unchecked workspaces backups are created before each ' +
  278.             'save'
  279.           Caption = 'Don'#39't backup workspaces'
  280.           TabOrder = 11
  281.         end
  282.       end
  283.       object TabsAndWindows: TTabSheet
  284.         Caption = 'Tabs and Windows'
  285.         ImageIndex = 9
  286.         object Label3: TLabel
  287.           Left = 13
  288.           Top = 17
  289.           Width = 68
  290.           Height = 17
  291.           AutoSize = False
  292.           Caption = 'Startup Tabs:'
  293.         end
  294.         object Label30: TLabel
  295.           Left = 13
  296.           Top = 117
  297.           Width = 48
  298.           Height = 13
  299.           Caption = 'Tab Style:'
  300.         end
  301.         object InsertNewTabs: TCheckBox
  302.           Tag = 2
  303.           Left = 13
  304.           Top = 65
  305.           Width = 198
  306.           Height = 17
  307.           Hint = 'If unchecked new tabs are added after the last tab.'
  308.           Caption = 'Put new tab next to current tab'
  309.           Checked = True
  310.           State = cbChecked
  311.           TabOrder = 2
  312.         end
  313.         object TabsOnTop: TCheckBox
  314.           Tag = 2
  315.           Left = 13
  316.           Top = 41
  317.           Width = 127
  318.           Height = 17
  319.           Hint = 'Show the page tabs at the top of the page.'
  320.           Caption = 'Page Tabs on Top'
  321.           Checked = True
  322.           State = cbChecked
  323.           TabOrder = 1
  324.         end
  325.         object StartupTabs: TRzSpinEdit
  326.           Tag = 1
  327.           Left = 90
  328.           Top = 12
  329.           Width = 47
  330.           Height = 21
  331.           CheckRange = True
  332.           Max = 30.000000000000000000
  333.           Value = 1.000000000000000000
  334.           TabOrder = 0
  335.         end
  336.         object ShowOutput: TCheckBox
  337.           Tag = 2
  338.           Left = 13
  339.           Top = 178
  340.           Width = 171
  341.           Height = 17
  342.           Hint = 'Show the DBMS Output window on startup'
  343.           Caption = 'Show dbmsOutput on startup'
  344.           TabOrder = 6
  345.         end
  346.         object ShowTabsStacked: TCheckBox
  347.           Tag = 2
  348.           Left = 13
  349.           Top = 89
  350.           Width = 171
  351.           Height = 17
  352.           Hint = 'If checked, all tabs are shown on multiple lines'
  353.           Caption = 'Show Tabs Stacked'
  354.           TabOrder = 3
  355.         end
  356.         object TabStyle: TComboBox
  357.           Tag = 1
  358.           Left = 69
  359.           Top = 113
  360.           Width = 154
  361.           Height = 21
  362.           Hint = 'Case of keywords'
  363.           Style = csDropDownList
  364.           ItemHeight = 13
  365.           ItemIndex = 0
  366.           TabOrder = 4
  367.           Text = 'Notched Right Side'
  368.           Items.Strings = (
  369.             'Notched Right Side'
  370.             'Rounded sides'
  371.             'Slanted sides')
  372.         end
  373.         object AlternateDirtyTabDisplay: TCheckBox
  374.           Tag = 2
  375.           Left = 13
  376.           Top = 149
  377.           Width = 226
  378.           Height = 17
  379.           Hint = 'Show an indicator on the tab instead of turning the text red'
  380.           Caption = 'Show alternate unsaved indicator'
  381.           TabOrder = 5
  382.         end
  383.       end
  384.       object Editor: TTabSheet
  385.         Caption = 'Editor'
  386.         object Label2: TLabel
  387.           Left = 153
  388.           Top = 54
  389.           Width = 54
  390.           Height = 14
  391.           AutoSize = False
  392.           Caption = 'Tab Size:'
  393.         end
  394.         object Label6: TLabel
  395.           Left = 2
  396.           Top = 48
  397.           Width = 76
  398.           Height = 35
  399.           Alignment = taRightJustify
  400.           AutoSize = False
  401.           Caption = 'Editor Height  Percentage:'
  402.           WordWrap = True
  403.         end
  404.         object Label25: TLabel
  405.           Left = 11
  406.           Top = 19
  407.           Width = 54
  408.           Height = 13
  409.           Caption = 'Editor Font:'
  410.         end
  411.         object AutoIndent: TCheckBox
  412.           Tag = 1
  413.           Left = 19
  414.           Top = 140
  415.           Width = 79
  416.           Height = 14
  417.           Caption = 'AutoIndent'
  418.           Checked = True
  419.           State = cbChecked
  420.           TabOrder = 6
  421.         end
  422.         object EditorPercent: TRzSpinEdit
  423.           Tag = 1
  424.           Left = 82
  425.           Top = 51
  426.           Width = 47
  427.           Height = 21
  428.           Increment = 5.000000000000000000
  429.           Max = 80.000000000000000000
  430.           Min = 20.000000000000000000
  431.           Value = 35.000000000000000000
  432.           TabOrder = 1
  433.         end
  434.         object TabSize: TRzSpinEdit
  435.           Tag = 1
  436.           Left = 211
  437.           Top = 51
  438.           Width = 47
  439.           Height = 21
  440.           Max = 20.000000000000000000
  441.           Min = 1.000000000000000000
  442.           Value = 4.000000000000000000
  443.           TabOrder = 2
  444.         end
  445.         object ShowLineNumbers: TCheckBox
  446.           Tag = 1
  447.           Left = 19
  448.           Top = 162
  449.           Width = 137
  450.           Height = 14
  451.           Caption = 'Show line numbers'
  452.           TabOrder = 7
  453.         end
  454.         object ScanOnOpen: TCheckBox
  455.           Tag = 3
  456.           Left = 37
  457.           Top = 108
  458.           Width = 170
  459.           Height = 17
  460.           Hint = 
  461.             'If checked files will be scanned for tabs on open and you will b' +
  462.             'e prompted to replace them if they exist.'
  463.           Caption = 'Scan files on Open for tabs.'
  464.           Enabled = False
  465.           TabOrder = 4
  466.         end
  467.         object UseSpaces: TCheckBox
  468.           Tag = 3
  469.           Left = 19
  470.           Top = 85
  471.           Width = 170
  472.           Height = 17
  473.           Caption = 'Use Spaces instead of tabs'
  474.           TabOrder = 3
  475.           OnClick = UseSpacesClick
  476.         end
  477.         object EditorFont2: TRzFontButtonEdit
  478.           Tag = 1
  479.           Left = 82
  480.           Top = 15
  481.           Width = 207
  482.           Height = 24
  483.           Text = '10 pt. Courier New'
  484.           Font.Charset = DEFAULT_CHARSET
  485.           Font.Color = clWindowText
  486.           Font.Height = -13
  487.           Font.Name = 'MS Sans Serif'
  488.           Font.Pitch = fpVariable
  489.           Font.Style = []
  490.           ParentFont = False
  491.           TabOrder = 0
  492.           AllowKeyEdit = False
  493.           FontDlgOptions = []
  494.           SelectedFont.Charset = ANSI_CHARSET
  495.           SelectedFont.Color = clWindowText
  496.           SelectedFont.Height = -13
  497.           SelectedFont.Name = 'Courier New'
  498.           SelectedFont.Style = []
  499.           ShowTextAsFont = True
  500.         end
  501.         object AllowCursorPastEOL: TCheckBox
  502.           Tag = 1
  503.           Left = 19
  504.           Top = 184
  505.           Width = 197
  506.           Height = 14
  507.           Hint = 
  508.             'If unchecked the editor'#39's cursor movement works like Microsoft p' +
  509.             'roducts.'
  510.           Caption = 'Allow cursor past end of line'
  511.           Checked = True
  512.           State = cbChecked
  513.           TabOrder = 8
  514.         end
  515.         object CtrlStep: TCheckBox
  516.           Tag = 1
  517.           Left = 19
  518.           Top = 206
  519.           Width = 235
  520.           Height = 14
  521.           Caption = 'Ctrl-Enter = Run single statement at cursor'
  522.           Checked = True
  523.           State = cbChecked
  524.           TabOrder = 9
  525.         end
  526.         object GroupBox4: TGroupBox
  527.           Left = 213
  528.           Top = 86
  529.           Width = 188
  530.           Height = 105
  531.           Caption = 'Typing Popup Options'
  532.           TabOrder = 5
  533.           Visible = False
  534.           object UseTypingPopup: TCheckBox
  535.             Tag = 1
  536.             Left = 21
  537.             Top = 24
  538.             Width = 130
  539.             Height = 17
  540.             Hint = 
  541.               'If checked the SQLBuilder will be opened if it was open on last ' +
  542.               'shutdown.'
  543.             Caption = 'Use Typing Popup'
  544.             Checked = True
  545.             State = cbChecked
  546.             TabOrder = 0
  547.           end
  548.           object TypingPopupDelay: TLabeledEdit
  549.             Tag = 1
  550.             Left = 21
  551.             Top = 67
  552.             Width = 44
  553.             Height = 21
  554.             EditLabel.Width = 130
  555.             EditLabel.Height = 13
  556.             EditLabel.Caption = 'Popup Delay (Milliseconds):'
  557.             TabOrder = 1
  558.             Text = '250'
  559.             OnExit = TypingPopupDelayExit
  560.           end
  561.         end
  562.       end
  563.       object Spreadsheet: TTabSheet
  564.         Caption = 'Spreadsheet'
  565.         object Label26: TLabel
  566.           Left = 11
  567.           Top = 10
  568.           Width = 87
  569.           Height = 13
  570.           Caption = 'Spreadsheet Font:'
  571.         end
  572.         object Label17: TLabel
  573.           Left = 11
  574.           Top = 60
  575.           Width = 169
  576.           Height = 13
  577.           Caption = 'Autosizing of Spreadsheet Columns:'
  578.         end
  579.         object ClearSpreadOnScript: TCheckBox
  580.           Tag = 2
  581.           Left = 11
  582.           Top = 135
  583.           Width = 179
  584.           Height = 17
  585.           Caption = 'Clear before running script'
  586.           TabOrder = 3
  587.         end
  588.         object ClearSpreadOnStatement: TCheckBox
  589.           Tag = 2
  590.           Left = 11
  591.           Top = 156
  592.           Width = 191
  593.           Height = 17
  594.           Caption = 'Clear before running statement'
  595.           TabOrder = 4
  596.         end
  597.         object SpreadFont2: TRzFontButtonEdit
  598.           Tag = 1
  599.           Left = 11
  600.           Top = 26
  601.           Width = 264
  602.           Height = 24
  603.           Text = '10 pt. Arial'
  604.           Font.Charset = DEFAULT_CHARSET
  605.           Font.Color = clWindowText
  606.           Font.Height = -13
  607.           Font.Name = 'Arial'
  608.           Font.Pitch = fpVariable
  609.           Font.Style = []
  610.           ParentFont = False
  611.           TabOrder = 0
  612.           AllowKeyEdit = False
  613.           FontDlgOptions = []
  614.           SelectedFont.Charset = ANSI_CHARSET
  615.           SelectedFont.Color = clWindowText
  616.           SelectedFont.Height = -13
  617.           SelectedFont.Name = 'Arial'
  618.           SelectedFont.Style = []
  619.           ShowTextAsFont = True
  620.         end
  621.         object AutoAlign: TCheckBox
  622.           Tag = 2
  623.           Left = 11
  624.           Top = 113
  625.           Width = 139
  626.           Height = 17
  627.           Hint = 'Right Align numbers in the spreadsheet'
  628.           Caption = 'Right align numbers'
  629.           Checked = True
  630.           State = cbChecked
  631.           TabOrder = 2
  632.         end
  633.         object AutoSize: TComboBox
  634.           Tag = 1
  635.           Left = 11
  636.           Top = 79
  637.           Width = 198
  638.           Height = 21
  639.           Style = csDropDownList
  640.           ItemHeight = 13
  641.           ItemIndex = 2
  642.           TabOrder = 1
  643.           Text = 'Autosize Data and Titles'
  644.           OnChange = SyntaxSettingsChange
  645.           Items.Strings = (
  646.             'No Autosize'
  647.             'Autosize Data'
  648.             'Autosize Data and Titles')
  649.         end
  650.       end
  651.       object Menus: TTabSheet
  652.         Caption = 'Menus'
  653.         object Label7: TLabel
  654.           Left = 7
  655.           Top = 5
  656.           Width = 102
  657.           Height = 13
  658.           Caption = 'Favorites Menu Root:'
  659.         end
  660.         object Label15: TLabel
  661.           Left = 261
  662.           Top = 21
  663.           Width = 116
  664.           Height = 53
  665.           AutoSize = False
  666.           Caption = 'Allow non-Select statements to run from the Favorites Menu.'
  667.           WordWrap = True
  668.         end
  669.         object Bevel2: TBevel
  670.           Left = 228
  671.           Top = 18
  672.           Width = 5
  673.           Height = 205
  674.           Shape = bsLeftLine
  675.         end
  676.         object Label16: TLabel
  677.           Left = 261
  678.           Top = 77
  679.           Width = 116
  680.           Height = 53
  681.           AutoSize = False
  682.           Caption = 'Use favorites directory as default directory.'
  683.           WordWrap = True
  684.         end
  685.         object Label28: TLabel
  686.           Left = 6
  687.           Top = 48
  688.           Width = 125
  689.           Height = 13
  690.           Caption = 'Favorites Menu File Filters:'
  691.         end
  692.         object AllowNonSelect: TCheckBox
  693.           Tag = 1
  694.           Left = 241
  695.           Top = 17
  696.           Width = 18
  697.           Height = 24
  698.           TabOrder = 2
  699.         end
  700.         object FavAsDefault: TCheckBox
  701.           Tag = 1
  702.           Left = 241
  703.           Top = 72
  704.           Width = 18
  705.           Height = 24
  706.           TabOrder = 3
  707.         end
  708.         object FavoritesFilters: TEdit
  709.           Tag = 1
  710.           Left = 6
  711.           Top = 62
  712.           Width = 208
  713.           Height = 19
  714.           Hint = 
  715.             'This is a comma separated list of file extensions to include in ' +
  716.             'the favorites list.'
  717.           AutoSize = False
  718.           TabOrder = 1
  719.           Text = 'SQL'
  720.           OnExit = FavoritesFiltersExit
  721.         end
  722.         object FavoritesRoot: TRzButtonEdit
  723.           Tag = 1
  724.           Left = 7
  725.           Top = 20
  726.           Width = 211
  727.           Height = 21
  728.           Hint = 
  729.             'This is the path to the root of your favorites directory.  Note ' +
  730.             'that the favorites menu will include subdirectories.'
  731.           TabOrder = 0
  732.           OnExit = FavoritesRootExit
  733.           OnButtonClick = FavoritesRootButtonClick
  734.         end
  735.         object GroupBox5: TGroupBox
  736.           Left = 5
  737.           Top = 101
  738.           Width = 136
  739.           Height = 88
  740.           Caption = 'Tools Menu Choices'
  741.           TabOrder = 4
  742.           object ShowGolden32: TCheckBox
  743.             Tag = 1
  744.             Left = 13
  745.             Top = 21
  746.             Width = 85
  747.             Height = 14
  748.             Caption = 'Golden32'
  749.             Checked = True
  750.             State = cbChecked
  751.             TabOrder = 0
  752.           end
  753.           object ShowPLEdit32: TCheckBox
  754.             Tag = 1
  755.             Left = 13
  756.             Top = 42
  757.             Width = 80
  758.             Height = 14
  759.             Caption = 'PLEdit32'
  760.             Checked = True
  761.             State = cbChecked
  762.             TabOrder = 1
  763.           end
  764.           object ShowGoldView32: TCheckBox
  765.             Tag = 1
  766.             Left = 13
  767.             Top = 63
  768.             Width = 85
  769.             Height = 14
  770.             Caption = 'GoldView32'
  771.             Checked = True
  772.             State = cbChecked
  773.             TabOrder = 2
  774.           end
  775.         end
  776.       end
  777.       object SyntaxHighlighting: TTabSheet
  778.         Caption = 'Syntax Highlighting'
  779.         object KeywordLabel: TLabel
  780.           Left = 20
  781.           Top = 55
  782.           Width = 54
  783.           Height = 17
  784.           Alignment = taRightJustify
  785.           AutoSize = False
  786.           Caption = 'Keywords:'
  787.         end
  788.         object CommentFont: TLabel
  789.           Left = 20
  790.           Top = 86
  791.           Width = 54
  792.           Height = 17
  793.           Alignment = taRightJustify
  794.           AutoSize = False
  795.           Caption = 'Comments:'
  796.         end
  797.         object StringFont: TLabel
  798.           Left = 20
  799.           Top = 117
  800.           Width = 54
  801.           Height = 17
  802.           Alignment = taRightJustify
  803.           AutoSize = False
  804.           Caption = 'Strings:'
  805.         end
  806.         object Label4: TLabel
  807.           Left = 96
  808.           Top = 32
  809.           Width = 34
  810.           Height = 16
  811.           AutoSize = False
  812.           Caption = 'Style'
  813.         end
  814.         object Label5: TLabel
  815.           Left = 188
  816.           Top = 32
  817.           Width = 35
  818.           Height = 17
  819.           AutoSize = False
  820.           Caption = 'Color'
  821.         end
  822.         object KeyWordSample: TLabel
  823.           Left = 259
  824.           Top = 57
  825.           Width = 35
  826.           Height = 13
  827.           Caption = 'Sample'
  828.         end
  829.         object CommentSample: TLabel
  830.           Left = 259
  831.           Top = 88
  832.           Width = 35
  833.           Height = 13
  834.           Caption = 'Sample'
  835.         end
  836.         object StringSample: TLabel
  837.           Left = 259
  838.           Top = 119
  839.           Width = 35
  840.           Height = 13
  841.           Caption = 'Sample'
  842.         end
  843.         object Label31: TLabel
  844.           Left = 9
  845.           Top = 151
  846.           Width = 63
  847.           Height = 13
  848.           Caption = 'Keyword List:'
  849.         end
  850.         object Label32: TLabel
  851.           Left = 190
  852.           Top = 164
  853.           Width = 183
  854.           Height = 136
  855.           AutoSize = False
  856.           Caption = 
  857.             'Edit this list to add or remove words that appear as syntax keyw' +
  858.             'ords in your scripts.  Note that this list is added to this prog' +
  859.             'ram'#39's core keyword list.  You can prefix a keyword with "-" to r' +
  860.             'emove it from the keyword list (i.e. -SELECT would remove SELECT' +
  861.             ' from the keyword list.)'
  862.           WordWrap = True
  863.         end
  864.         object KeyWordStyle: TComboBox
  865.           Tag = 1
  866.           Left = 80
  867.           Top = 53
  868.           Width = 71
  869.           Height = 21
  870.           Style = csDropDownList
  871.           ItemHeight = 13
  872.           TabOrder = 1
  873.           OnChange = SyntaxSettingsChange
  874.           Items.Strings = (
  875.             'Normal'
  876.             'Bold'
  877.             'Italic'
  878.             'Bold Italic')
  879.         end
  880.         object CommentStyle: TComboBox
  881.           Tag = 1
  882.           Left = 80
  883.           Top = 84
  884.           Width = 71
  885.           Height = 21
  886.           Style = csDropDownList
  887.           ItemHeight = 13
  888.           TabOrder = 3
  889.           OnChange = SyntaxSettingsChange
  890.           Items.Strings = (
  891.             'Normal'
  892.             'Bold'
  893.             'Italic'
  894.             'Bold Italic')
  895.         end
  896.         object StringStyle: TComboBox
  897.           Tag = 1
  898.           Left = 80
  899.           Top = 115
  900.           Width = 71
  901.           Height = 21
  902.           Style = csDropDownList
  903.           ItemHeight = 13
  904.           TabOrder = 5
  905.           OnChange = SyntaxSettingsChange
  906.           Items.Strings = (
  907.             'Normal'
  908.             'Bold'
  909.             'Italic'
  910.             'Bold Italic')
  911.         end
  912.         object UseSyntaxHighlighting: TCheckBox
  913.           Tag = 1
  914.           Left = 11
  915.           Top = 8
  916.           Width = 142
  917.           Height = 17
  918.           Caption = 'Use Syntax Highlighting'
  919.           Checked = True
  920.           State = cbChecked
  921.           TabOrder = 0
  922.           OnClick = UseSyntaxHighlightingClick
  923.         end
  924.         object SHKeyWordColor: TRzColorComboBox
  925.           Tag = 1
  926.           Left = 158
  927.           Top = 52
  928.           Width = 97
  929.           Height = 22
  930.           ColorNames.Default = 'Default'
  931.           ColorNames.Black = 'Black'
  932.           ColorNames.Maroon = 'Maroon'
  933.           ColorNames.Green = 'Green'
  934.           ColorNames.Olive = 'Olive'
  935.           ColorNames.Navy = 'Navy'
  936.           ColorNames.Purple = 'Purple'
  937.           ColorNames.Teal = 'Teal'
  938.           ColorNames.Gray = 'Gray'
  939.           ColorNames.Silver = 'Silver'
  940.           ColorNames.Red = 'Red'
  941.           ColorNames.Lime = 'Lime'
  942.           ColorNames.Yellow = 'Yellow'
  943.           ColorNames.Blue = 'Blue'
  944.           ColorNames.Fuchsia = 'Fuchsia'
  945.           ColorNames.Aqua = 'Aqua'
  946.           ColorNames.White = 'White'
  947.           ColorNames.ScrollBar = 'ScrollBar'
  948.           ColorNames.Background = 'Background'
  949.           ColorNames.ActiveCaption = 'ActiveCaption'
  950.           ColorNames.InactiveCaption = 'InactiveCaption'
  951.           ColorNames.Menu = 'Menu'
  952.           ColorNames.Window = 'Window'
  953.           ColorNames.WindowFrame = 'WindowFrame'
  954.           ColorNames.MenuText = 'MenuText'
  955.           ColorNames.WindowText = 'WindowText'
  956.           ColorNames.CaptionText = 'CaptionText'
  957.           ColorNames.ActiveBorder = 'ActiveBorder'
  958.           ColorNames.InactiveBorder = 'InactiveBorder'
  959.           ColorNames.AppWorkSpace = 'AppWorkSpace'
  960.           ColorNames.Highlight = 'Highlight'
  961.           ColorNames.HighlightText = 'HighlightText'
  962.           ColorNames.BtnFace = 'BtnFace'
  963.           ColorNames.BtnShadow = 'BtnShadow'
  964.           ColorNames.GrayText = 'GrayText'
  965.           ColorNames.BtnText = 'BtnText'
  966.           ColorNames.InactiveCaptionText = 'InactiveCaptionText'
  967.           ColorNames.BtnHighlight = 'BtnHighlight'
  968.           ColorNames.DkShadow3D = '3DDkShadow'
  969.           ColorNames.Light3D = '3DLight'
  970.           ColorNames.InfoText = 'InfoText'
  971.           ColorNames.InfoBk = 'InfoBk'
  972.           ColorNames.Custom = 'Custom'
  973.           DefaultColor = clMaroon
  974.           ShowCustomColor = False
  975.           ShowSysColors = False
  976.           SelectedColor = clMaroon
  977.           ItemHeight = 16
  978.           TabOrder = 2
  979.           OnChange = SyntaxSettingsChange
  980.         end
  981.         object SHCommentColor: TRzColorComboBox
  982.           Tag = 1
  983.           Left = 158
  984.           Top = 83
  985.           Width = 97
  986.           Height = 22
  987.           ColorNames.Default = 'Default'
  988.           ColorNames.Black = 'Black'
  989.           ColorNames.Maroon = 'Maroon'
  990.           ColorNames.Green = 'Green'
  991.           ColorNames.Olive = 'Olive'
  992.           ColorNames.Navy = 'Navy'
  993.           ColorNames.Purple = 'Purple'
  994.           ColorNames.Teal = 'Teal'
  995.           ColorNames.Gray = 'Gray'
  996.           ColorNames.Silver = 'Silver'
  997.           ColorNames.Red = 'Red'
  998.           ColorNames.Lime = 'Lime'
  999.           ColorNames.Yellow = 'Yellow'
  1000.           ColorNames.Blue = 'Blue'
  1001.           ColorNames.Fuchsia = 'Fuchsia'
  1002.           ColorNames.Aqua = 'Aqua'
  1003.           ColorNames.White = 'White'
  1004.           ColorNames.ScrollBar = 'ScrollBar'
  1005.           ColorNames.Background = 'Background'
  1006.           ColorNames.ActiveCaption = 'ActiveCaption'
  1007.           ColorNames.InactiveCaption = 'InactiveCaption'
  1008.           ColorNames.Menu = 'Menu'
  1009.           ColorNames.Window = 'Window'
  1010.           ColorNames.WindowFrame = 'WindowFrame'
  1011.           ColorNames.MenuText = 'MenuText'
  1012.           ColorNames.WindowText = 'WindowText'
  1013.           ColorNames.CaptionText = 'CaptionText'
  1014.           ColorNames.ActiveBorder = 'ActiveBorder'
  1015.           ColorNames.InactiveBorder = 'InactiveBorder'
  1016.           ColorNames.AppWorkSpace = 'AppWorkSpace'
  1017.           ColorNames.Highlight = 'Highlight'
  1018.           ColorNames.HighlightText = 'HighlightText'
  1019.           ColorNames.BtnFace = 'BtnFace'
  1020.           ColorNames.BtnShadow = 'BtnShadow'
  1021.           ColorNames.GrayText = 'GrayText'
  1022.           ColorNames.BtnText = 'BtnText'
  1023.           ColorNames.InactiveCaptionText = 'InactiveCaptionText'
  1024.           ColorNames.BtnHighlight = 'BtnHighlight'
  1025.           ColorNames.DkShadow3D = '3DDkShadow'
  1026.           ColorNames.Light3D = '3DLight'
  1027.           ColorNames.InfoText = 'InfoText'
  1028.           ColorNames.InfoBk = 'InfoBk'
  1029.           ColorNames.Custom = 'Custom'
  1030.           DefaultColor = clGreen
  1031.           ShowCustomColor = False
  1032.           ShowSysColors = False
  1033.           SelectedColor = clGreen
  1034.           ItemHeight = 16
  1035.           TabOrder = 4
  1036.           OnChange = SyntaxSettingsChange
  1037.         end
  1038.         object SHStringColor: TRzColorComboBox
  1039.           Tag = 1
  1040.           Left = 158
  1041.           Top = 114
  1042.           Width = 97
  1043.           Height = 22
  1044.           ColorNames.Default = 'Default'
  1045.           ColorNames.Black = 'Black'
  1046.           ColorNames.Maroon = 'Maroon'
  1047.           ColorNames.Green = 'Green'
  1048.           ColorNames.Olive = 'Olive'
  1049.           ColorNames.Navy = 'Navy'
  1050.           ColorNames.Purple = 'Purple'
  1051.           ColorNames.Teal = 'Teal'
  1052.           ColorNames.Gray = 'Gray'
  1053.           ColorNames.Silver = 'Silver'
  1054.           ColorNames.Red = 'Red'
  1055.           ColorNames.Lime = 'Lime'
  1056.           ColorNames.Yellow = 'Yellow'
  1057.           ColorNames.Blue = 'Blue'
  1058.           ColorNames.Fuchsia = 'Fuchsia'
  1059.           ColorNames.Aqua = 'Aqua'
  1060.           ColorNames.White = 'White'
  1061.           ColorNames.ScrollBar = 'ScrollBar'
  1062.           ColorNames.Background = 'Background'
  1063.           ColorNames.ActiveCaption = 'ActiveCaption'
  1064.           ColorNames.InactiveCaption = 'InactiveCaption'
  1065.           ColorNames.Menu = 'Menu'
  1066.           ColorNames.Window = 'Window'
  1067.           ColorNames.WindowFrame = 'WindowFrame'
  1068.           ColorNames.MenuText = 'MenuText'
  1069.           ColorNames.WindowText = 'WindowText'
  1070.           ColorNames.CaptionText = 'CaptionText'
  1071.           ColorNames.ActiveBorder = 'ActiveBorder'
  1072.           ColorNames.InactiveBorder = 'InactiveBorder'
  1073.           ColorNames.AppWorkSpace = 'AppWorkSpace'
  1074.           ColorNames.Highlight = 'Highlight'
  1075.           ColorNames.HighlightText = 'HighlightText'
  1076.           ColorNames.BtnFace = 'BtnFace'
  1077.           ColorNames.BtnShadow = 'BtnShadow'
  1078.           ColorNames.GrayText = 'GrayText'
  1079.           ColorNames.BtnText = 'BtnText'
  1080.           ColorNames.InactiveCaptionText = 'InactiveCaptionText'
  1081.           ColorNames.BtnHighlight = 'BtnHighlight'
  1082.           ColorNames.DkShadow3D = '3DDkShadow'
  1083.           ColorNames.Light3D = '3DLight'
  1084.           ColorNames.InfoText = 'InfoText'
  1085.           ColorNames.InfoBk = 'InfoBk'
  1086.           ColorNames.Custom = 'Custom'
  1087.           DefaultColor = clBlue
  1088.           ShowCustomColor = False
  1089.           ShowSysColors = False
  1090.           SelectedColor = clBlue
  1091.           ItemHeight = 16
  1092.           TabOrder = 6
  1093.           OnChange = SyntaxSettingsChange
  1094.         end
  1095.         object KeywordMemo: TMemo
  1096.           Tag = 2
  1097.           Left = 9
  1098.           Top = 167
  1099.           Width = 170
  1100.           Height = 127
  1101.           ScrollBars = ssBoth
  1102.           TabOrder = 7
  1103.           WordWrap = False
  1104.         end
  1105.       end
  1106.       object SQLBuilder: TTabSheet
  1107.         Caption = 'SQLBuilder'
  1108.         ImageIndex = 7
  1109.         object Label20: TLabel
  1110.           Left = 12
  1111.           Top = 186
  1112.           Width = 63
  1113.           Height = 13
  1114.           Caption = 'Keyword List:'
  1115.         end
  1116.         object Label18: TLabel
  1117.           Left = 193
  1118.           Top = 199
  1119.           Width = 183
  1120.           Height = 97
  1121.           AutoSize = False
  1122.           Caption = 
  1123.             'Edit this list to add or remove words that appear in the SQLBuil' +
  1124.             'der word list.  These words will appear in two columns with ever' +
  1125.             'y other word being in the first column.  You may want to copy th' +
  1126.             'is into notepad for editing!'
  1127.           WordWrap = True
  1128.         end
  1129.         object Label21: TLabel
  1130.           Left = 249
  1131.           Top = 11
  1132.           Width = 82
  1133.           Height = 13
  1134.           Caption = 'Keyword Pastes: '
  1135.         end
  1136.         object Label22: TLabel
  1137.           Left = 249
  1138.           Top = 52
  1139.           Width = 95
  1140.           Height = 13
  1141.           Caption = 'Table/Field Pastes: '
  1142.         end
  1143.         object Label14: TLabel
  1144.           Left = 249
  1145.           Top = 94
  1146.           Width = 93
  1147.           Height = 13
  1148.           Caption = 'Column Information:'
  1149.         end
  1150.         object Label19: TLabel
  1151.           Left = 10
  1152.           Top = 125
  1153.           Width = 104
  1154.           Height = 13
  1155.           Caption = 'UserList Performance:'
  1156.         end
  1157.         object SQLBuilderMemo: TMemo
  1158.           Tag = 2
  1159.           Left = 12
  1160.           Top = 202
  1161.           Width = 170
  1162.           Height = 90
  1163.           ScrollBars = ssBoth
  1164.           TabOrder = 0
  1165.           WordWrap = False
  1166.         end
  1167.         object SmartFormatPastes: TCheckBox
  1168.           Tag = 1
  1169.           Left = 11
  1170.           Top = 29
  1171.           Width = 183
  1172.           Height = 18
  1173.           Hint = 'Guess on formatting.'
  1174.           Caption = 'Try to Format Pastes'
  1175.           Checked = True
  1176.           ParentShowHint = False
  1177.           ShowHint = True
  1178.           State = cbChecked
  1179.           TabOrder = 1
  1180.         end
  1181.         object AddEntToCols: TCheckBox
  1182.           Tag = 1
  1183.           Left = 11
  1184.           Top = 51
  1185.           Width = 223
  1186.           Height = 18
  1187.           Hint = 'Add Entity names to Fields.'
  1188.           Caption = 'Add table name to columns. (emp.empno)'
  1189.           ParentShowHint = False
  1190.           ShowHint = True
  1191.           TabOrder = 2
  1192.         end
  1193.         object KeywordCasePastes: TComboBox
  1194.           Tag = 1
  1195.           Left = 249
  1196.           Top = 25
  1197.           Width = 107
  1198.           Height = 21
  1199.           Hint = 'Case of keywords'
  1200.           Style = csDropDownList
  1201.           ItemHeight = 13
  1202.           TabOrder = 3
  1203.           Items.Strings = (
  1204.             'Uppercase'
  1205.             'Lowercase'
  1206.             'Unchanged')
  1207.         end
  1208.         object TableCasePastes: TComboBox
  1209.           Tag = 1
  1210.           Left = 249
  1211.           Top = 66
  1212.           Width = 107
  1213.           Height = 21
  1214.           Hint = 'Case of tables and fields.'
  1215.           Style = csDropDownList
  1216.           ItemHeight = 13
  1217.           TabOrder = 4
  1218.           Items.Strings = (
  1219.             'Uppercase'
  1220.             'Lowercase'
  1221.             'Unchanged')
  1222.         end
  1223.         object ColumnInfo: TComboBox
  1224.           Tag = 1
  1225.           Left = 249
  1226.           Top = 108
  1227.           Width = 121
  1228.           Height = 21
  1229.           Hint = 'Reduce information to speed up SQLBuilder.'
  1230.           Style = csDropDownList
  1231.           ItemHeight = 13
  1232.           TabOrder = 5
  1233.           Items.Strings = (
  1234.             'Columns Only'
  1235.             'Cols & Primary Key'
  1236.             'Cols, PK & Indexes')
  1237.         end
  1238.         object RememberSQLBuilderOpen: TCheckBox
  1239.           Tag = 2
  1240.           Left = 11
  1241.           Top = 7
  1242.           Width = 200
  1243.           Height = 17
  1244.           Hint = 
  1245.             'If checked the SQLBuilder will be opened if it was open on last ' +
  1246.             'shutdown.'
  1247.           Caption = 'Remember SQLBuilder Open Status'
  1248.           TabOrder = 6
  1249.         end
  1250.         object UserListPerformanceOption: TComboBox
  1251.           Tag = 1
  1252.           Left = 13
  1253.           Top = 140
  1254.           Width = 204
  1255.           Height = 21
  1256.           Hint = 'Case of keywords'
  1257.           AutoDropDown = True
  1258.           Style = csDropDownList
  1259.           ItemHeight = 13
  1260.           ItemIndex = 0
  1261.           TabOrder = 7
  1262.           Text = 'Fast Query (Default)'
  1263.           Items.Strings = (
  1264.             'Fast Query (Default)'
  1265.             'Alternate Fast Query'
  1266.             'All Users Fast Query'
  1267.             'Slow Query')
  1268.         end
  1269.         object SingleClickPaste: TCheckBox
  1270.           Tag = 1
  1271.           Left = 11
  1272.           Top = 73
  1273.           Width = 223
  1274.           Height = 18
  1275.           Hint = 'If unchecked then use double-click to paste'
  1276.           Caption = 'Single click paste keywords && Columns'
  1277.           Checked = True
  1278.           ParentShowHint = False
  1279.           ShowHint = True
  1280.           State = cbChecked
  1281.           TabOrder = 8
  1282.         end
  1283.         object MoveFocusOnPaste: TCheckBox
  1284.           Tag = 1
  1285.           Left = 11
  1286.           Top = 95
  1287.           Width = 223
  1288.           Height = 18
  1289.           Hint = 
  1290.             'Move focus to the editor after a paste (otherwise it stays in th' +
  1291.             'e SQLBuilder)'
  1292.           Caption = 'Move focus to editor after paste'
  1293.           ParentShowHint = False
  1294.           ShowHint = True
  1295.           TabOrder = 9
  1296.         end
  1297.       end
  1298.       object FileFilters: TTabSheet
  1299.         Caption = 'File Filters and Extensions'
  1300.         ImageIndex = 7
  1301.         object GroupBox1: TGroupBox
  1302.           Left = 2
  1303.           Top = 1
  1304.           Width = 392
  1305.           Height = 230
  1306.           Caption = 'Script/SQL Files'
  1307.           TabOrder = 0
  1308.           object Label10: TLabel
  1309.             Left = 19
  1310.             Top = 18
  1311.             Width = 358
  1312.             Height = 63
  1313.             AutoSize = False
  1314.             Caption = 
  1315.               'The filter list is the list of file filters in the open and save' +
  1316.               ' dialog boxes.  Each filter is composed of a text name and a fil' +
  1317.               'ter separated by the '#39'|'#39' character.'#13'SQL Files (*.sql)|*.sql'#13'All ' +
  1318.               'Files (*.*)|*.*'
  1319.             WordWrap = True
  1320.           end
  1321.           object Label11: TLabel
  1322.             Left = 19
  1323.             Top = 83
  1324.             Width = 44
  1325.             Height = 13
  1326.             Caption = 'Filter List:'
  1327.           end
  1328.           object Label12: TLabel
  1329.             Left = 19
  1330.             Top = 165
  1331.             Width = 62
  1332.             Height = 13
  1333.             Caption = 'Filter Default:'
  1334.           end
  1335.           object Label13: TLabel
  1336.             Left = 160
  1337.             Top = 165
  1338.             Width = 101
  1339.             Height = 13
  1340.             Caption = 'Default file extension:'
  1341.           end
  1342.           object FilterDefaultSpinner: TRzSpinEdit
  1343.             Tag = 1
  1344.             Left = 95
  1345.             Top = 161
  1346.             Width = 47
  1347.             Height = 21
  1348.             Max = 10.000000000000000000
  1349.             Min = 1.000000000000000000
  1350.             Value = 1.000000000000000000
  1351.             TabOrder = 1
  1352.           end
  1353.           object DefaultFiltersButton1: TRzButton
  1354.             Left = 149
  1355.             Top = 194
  1356.             Width = 119
  1357.             Caption = 'Restore Defaults'
  1358.             HotTrack = True
  1359.             TabOrder = 4
  1360.             OnClick = DefaultFiltersButton1Click
  1361.           end
  1362.           object FileFilterList: TMemo
  1363.             Tag = 1
  1364.             Left = 18
  1365.             Top = 98
  1366.             Width = 323
  1367.             Height = 59
  1368.             ScrollBars = ssVertical
  1369.             TabOrder = 0
  1370.           end
  1371.           object TestFileFilterButton: TRzButton
  1372.             Left = 19
  1373.             Top = 194
  1374.             Width = 119
  1375.             Caption = 'Test'
  1376.             HotTrack = True
  1377.             TabOrder = 3
  1378.             OnClick = TestFileFilterButtonClick
  1379.           end
  1380.           object FilterFileExtension: TEdit
  1381.             Tag = 1
  1382.             Left = 273
  1383.             Top = 161
  1384.             Width = 55
  1385.             Height = 21
  1386.             TabOrder = 2
  1387.             Text = 'SQL'
  1388.             OnExit = FileExtensionExit
  1389.           end
  1390.         end
  1391.         object GroupBox2: TGroupBox
  1392.           Left = 4
  1393.           Top = 233
  1394.           Width = 390
  1395.           Height = 54
  1396.           Caption = 'Workspace Files'
  1397.           TabOrder = 1
  1398.           object Label29: TLabel
  1399.             Left = 15
  1400.             Top = 21
  1401.             Width = 159
  1402.             Height = 13
  1403.             Caption = 'Default Workspace file extension:'
  1404.           end
  1405.           object WorkspaceExtension: TEdit
  1406.             Tag = 1
  1407.             Left = 184
  1408.             Top = 17
  1409.             Width = 55
  1410.             Height = 21
  1411.             TabOrder = 0
  1412.             Text = 'GWF'
  1413.             OnExit = FileExtensionExit
  1414.           end
  1415.         end
  1416.       end
  1417.     end
  1418.   end
  1419.   object OpenDialog1: TOpenDialog
  1420.     Left = 278
  1421.     Top = 214
  1422.   end
  1423.   object RzSelectFolderDialog1: TRzSelectFolderDialog
  1424.     Left = 315
  1425.     Top = 213
  1426.   end
  1427. end
  1428.